[RTF]
{\rtf1\ansi\ansicpg1252\deff0{\fonttbl{\f0\froman\fcharset1 Tahoma;}{\f1\froman\fcharset0 Tms Rmn;}{\f2\froman\fcharset0 Times New Roman;}{\f3\fnil\fcharset0 Trendy;}{\f4\fswiss\fcharset0 Arial;}{\f5\froman\fcharset2 Wingdings 2;}{\f6\fswiss\fcharset0 Arial Narrow;}{\f7\fnil\fcharset0 ?????;}}{\colortbl\red0\green0\blue0;\red0\green0\blue255;\red0\green255\blue255;\red0\green255\blue0;\red255\green0\blue255;\red255\green0\blue0;\red255\green255\blue0;\red255\green255\blue255;\red0\green0\blue127;\red0\green127\blue127;\red0\green127\blue0;\red127\green0\blue127;\red127\green0\blue0;\red127\green127\blue0;\red127\green127\blue127;\red192\green192\blue192}{\info{\title                                      DICHIARAZIONE DI VOLONTA}{\operator                                      Sergio Luzzi Galeazzi}{\author                                      Sergio Luzzi Galeazzi}{\creatim\yr1996\mo9\dy19\hr9\min2\sec17}{\revtim\yr1996\mo12\dy7\hr3\min33\sec58}{\printim\yr1996\mo12\dy15\hr11\min36\sec51}{\version1}{\vern262367}}\paperw11903\paperh16833\margl191\margr0\margt320\margb0\deftab850\pard\ql\li141\fi0\ri158{\field{\*\fldinst{\b\i\f7\fs20\cf0\up0\dn0 USER_NOME}}{\fldrslt{\b\i\f7\fs20\cf0\up0\dn0 Utente: Nome e cognome}}}{\par}\pard\ql\li141\fi0\tx6094\ri158{\f7\fs20\cf0\up0\dn0 Medico chirurgo}{\b\f7\fs20\cf0\up0\dn0\tab}{\b\f7\fs20\cf0\up0\dn0 Fattura }{\f7\fs20\cf0\up0\dn0 n }{\field{\*\fldinst{\b\i\f7\fs20\cf0\up0\dn0 CUSTOM1}}{\fldrslt{\b\i\f7\fs20\cf0\up0\dn0 }}}{\b\f7\fs20\cf0\up0\dn0\tab}{\par}\pard\ql\li141\fi0\ri158{\field{\*\fldinst{\f7\fs20\cf0\up0\dn0 USER_IND}}{\fldrslt{\f7\fs20\cf0\up0\dn0 Utente: Indirizzo}}}{\f7\fs20\cf0\up0\dn0  }{\field{\*\fldinst{\f7\fs20\cf0\up0\dn0 USER_CITTA}}{\fldrslt{\f7\fs20\cf0\up0\dn0 Utente: Citta}}}{\par}\pard\ql\li141\fi0\ri158{\f7\fs20\cf0\up0\dn0 PI: }{\field{\*\fldinst{\f7\fs20\cf0\up0\dn0 USER_IVA}}{\fldrslt{\f7\fs20\cf0\up0\dn0 Utente: Codice Partita IVA}}}{\f7\fs20\cf0\up0\dn0  / CF:}{\field{\*\fldinst{\f7\fs20\cf0\up0\dn0 USER_CF}}{\fldrslt{\f7\fs20\cf0\up0\dn0 Utente: Codice Fiscale}}}{\par}\pard\ql\li141\fi0\tx5669\ri158{\f7\fs20\cf0\up0\dn0\tab}{\par}\pard\ql\li141\fi0\tx6094\ri158{\f7\fs20\cf0\up0\dn0\tab}{\i\f7\fs20\cf0\up0\dn0 Data }{\field{\*\fldinst{\f7\fs20\cf0\up0\dn0 XVI_DATA}}{\fldrslt{\f7\fs20\cf0\up0\dn0 GG.MM.AA}}}{\par}\pard\ql\li141\fi0\ri158{\b\f7\fs20\cf0\up0\dn0 _____________________________________________________________________}{\par}\pard\ql\li141\fi0\tx708\tx1842\ri158{\i\f7\fs20\cf0\up0\dn0 Intestatario }{\field{\*\fldinst{\b\f7\fs20\cf0\up0\dn0 XPA_NOME}}{\fldrslt{\b\f7\fs20\cf0\up0\dn0 ASSIRELLI MARIA}}}{\par}\pard\ql\li141\fi0\tx1842\ri158{\i\f7\fs20\cf0\up0\dn0 Indirizzo }{\field{\*\fldinst{\b\f7\fs20\cf0\up0\dn0 XPA_IND}}{\fldrslt{\b\f7\fs20\cf0\up0\dn0 Paziente: Indirizzo}}}{\par}\pard\ql\li141\fi0\tx1842\ri158{\field{\*\fldinst{\b\f7\fs20\cf0\up0\dn0 XPA_CAP}}{\fldrslt{\b\f7\fs20\cf0\up0\dn0 C A P}}}{\b\f7\fs20\cf0\up0\dn0  - }{\field{\*\fldinst{\b\f7\fs20\cf0\up0\dn0 XPA_CIT}}{\fldrslt{\b\f7\fs20\cf0\up0\dn0 Paziente: Citt}}}{\b\f7\fs20\cf0\up0\dn0  (}{\field{\*\fldinst{\b\f7\fs20\cf0\up0\dn0 XUT_PROV}}{\fldrslt{\b\f7\fs20\cf0\up0\dn0 LU}}}{\b\f7\fs20\cf0\up0\dn0 )}{\par}\pard\ql\li141\fi0\tx425\tx1842\ri158{\i\f7\fs20\cf0\up0\dn0 Cod. fisc. - P. IVA}{\f7\fs20\cf0\up0\dn0\tab}{\field{\*\fldinst{\b\f7\fs20\cf0\up0\dn0 XPA_CODFIS}}{\fldrslt{\b\f7\fs20\cf0\up0\dn0 CFCFCFCFCFCFCFCF}}}{\par}\pard\ql\li141\fi0\ri158{\b\f7\fs20\cf0\up0\dn0 _____________________________________________________________________}{\par}\pard\ql\li141\fi0\ri158{\i\f7\fs20\cf0\up0\dn0 |}{\i\f2\fs20\cf0\up0\dn0 Natura dei servizi formanti oggetto della prestazione}{\i\f7\fs20\cf0\up0\dn0 |}{\par}\pard\ql\li141\fi0\tx7795\ri158{\f7\fs20\cf0\up0\dn0\par}\pard\ql\li141\fi0\tx5527\tx6519\ri158{\field{\*\fldinst{\b\f7\fs20\cf0\up0\dn0 CUSTOM10}}{\fldrslt{\b\f7\fs20\cf0\up0\dn0 }}}{\b\f7\fs20\cf0\up0\dn0\tab}{\b\f7\fs20\cf0\up0\dn0  }{\f7\fs20\cf0\up0\dn0 Importo \uc2\u8364\'80\'00}{\f7\fs20\cf0\up0\dn0\tab}{\field{\*\fldinst{\b\f7\fs20\cf0\up0\dn0 CUSTOM11}}{\fldrslt{\b\f7\fs20\cf0\up0\dn0 }}}{\f7\fs20\cf0\up0\dn0\tab}{\par}\pard\ql\li141\fi0\tx8220\ri158{\f7\fs20\cf0\up0\dn0\par}\pard\ql\li141\fi0\tx8220\ri158{\f7\fs20\cf0\up0\dn0 _____________________________________________________________________}{\par}\pard\ql\li141\fi0\ri158{\f7\fs20\cf0\up0\dn0\par}\pard\ql\li141\fi0\tx5385\tx6519\ri158{\f2\fs18\cf0\up0\dn0 Le prestazioni sanitarie sono esenti da IVA ai sensi dell'Art. 10,}{\f7\fs20\cf0\up0\dn0\tab}{\f7\fs20\cf0\up0\dn0 Imponibile \uc2\u8364\'80\'00}{\f7\fs20\cf0\up0\dn0\tab}{\field{\*\fldinst{\b\f7\fs20\cf0\up0\dn0 CUSTOM2}}{\fldrslt{\b\f7\fs20\cf0\up0\dn0 }}}{\par}\pard\ql\li141\fi0\ri158{\f2\fs18\cf0\up0\dn0 comma 1, N 18, del DPR 633/1072 e successive modifiche. Le}{\par}\pard\ql\li141\fi0\ri158{\f2\fs18\cf0\up0\dn0 prestazioni a favore di imprese e le cessioni dei beni sono }{\par}\pard\ql\li141\fi0\ri158{\f2\fs18\cf0\up0\dn0 invece soggette ad IVA}{\f2\fs18\cf0\up0\dn0\tab}{\f2\fs18\cf0\up0\dn0\tab}{\par}\pard\ql\li141\fi0\tx5244\tx6519\ri158{\f7\fs20\cf0\up0\dn0\tab}{\f7\fs20\cf0\up0\dn0  I.V.A. 22% \uc2\u8364\'80\'00.}{\f7\fs20\cf0\up0\dn0\tab}{\field{\*\fldinst{\b\f7\fs20\cf0\up0\dn0 CUSTOM6}}{\fldrslt{\b\f7\fs20\cf0\up0\dn0 }}}{\par}\pard\ql\li141\fi0\tx5102\tx6519\ri158{\i\f7\fs20\cf0\up0\dn0\tab}{\i\f7\fs20\cf0\up0\dn0 Rit. d'acconto \uc2\u8364\'80\'00}{\i\f7\fs20\cf0\up0\dn0\tab}{\field{\*\fldinst{\b\f7\fs20\cf0\up0\dn0 CUSTOM7}}{\fldrslt{\b\f7\fs20\cf0\up0\dn0 }}}{\par}\pard\ql\li141\fi0\tx5811\tx6519\ri158{\b\f2\fs22\cf0\up0\dn0 Il bollo va applicato per importi superiori a 77,47}{\f7\fs20\cf0\up0\dn0\tab}{\f7\fs20\cf0\up0\dn0  }{\i\f7\fs20\cf0\up0\dn0 Bollo \uc2\u8364\'80\'00}{\i\f7\fs20\cf0\up0\dn0\tab}{\field{\*\fldinst{\b\f7\fs20\cf0\up0\dn0 CUSTOM8}}{\fldrslt{\b\f7\fs20\cf0\up0\dn0 }}}{\par}\pard\ql\li141\fi0\ri158{\b\f7\fs20\cf0\up0\dn0 _____________________________________________________________________}{\par}\pard\ql\li141\fi0\tx6803\tx8220\ri158{\f7\fs20\cf0\up0\dn0\par}\pard\ql\li141\fi0\tx5669\tx6519\ri158{\b\i\f7\fs22\cf0\up0\dn0\tab}{\b\i\f7\fs22\cf0\up0\dn0  }{\b\i\f7\fs20\cf0\up0\dn0 Totale \uc2\u8364\'80\'00}{\b\i\f7\fs20\cf0\up0\dn0\tab}{\field{\*\fldinst{\b\f7\fs20\cf0\up0\dn0 CUSTOM9}}{\fldrslt{\b\f7\fs20\cf0\up0\dn0 }}}{\par}\pard\ql\li141\fi0\ri158{\i\f7\fs20\cf0\up0\dn0\par}\pard\ql\li141\fi0\ri158{\i\f7\fs20\cf0\up0\dn0\par}\pard\ql\li141\fi0\tx2834\ri158{\i\f7\fs20\cf0\up0\dn0\tab}{\i\f7\fs20\cf0\up0\dn0 _____________________________}{\par}\pard\ql\li141\fi0\tx3685\ri158{\i\f7\fs20\cf0\up0\dn0\tab}{\i\f7\fs16\cf0\up4\dn0 firma per quietanza}{\par}\pard\ql\li141\fi0\ri158}
[CUSTOM1]
cRet:=PBgetText("NUMERO FATTURA",10,"      ","Numero fattura")
Return cRet
[D_CUSTOM1]
Descrizionenumero_fattura
[CUSTOM10]
cRet := PBgetText( "Natura dei servizi forniti", 55, Pad("Certificazione medica ",22), "compilazione parcella " )
Return cRet
[D_CUSTOM10]
Descrizionetipo_certificato
[CUSTOM11]
importo := PBgetText( "Importo", 10, "", "Importo dd" ) 
importo := val (importo)
s := trim(str(importo,10,2))
return s
[D_CUSTOM11]
Descrizioneimporto_certificato
[CUSTOM12]
s := PBgetText( "immettere 1 per ritenuta d'acconto - niente se senza ritenuta", 10, "", "ritenuta d'acconto" ) 
return s
[D_CUSTOM12]
DescrizioneinvisibileRit
[CUSTOM2]
s:= ricetta.CUSTOM11
return s
[D_CUSTOM2]
Descrizioneimponibile
[CUSTOM3]
s := PBgetText( "immettere 1 per prestazione con IVA - niente se esente IVA", 10, "", "iva" ) 
return s
[D_CUSTOM3]
DescrizioneinvisibileIva
[CUSTOM4]
IIF( ricetta.CUSTOM12 = '1', sImporto := ricetta.CUSTOM11, sImporto := 0 )
return sImporto
[D_CUSTOM4]
Descrizioneinvisibile_ritenuta
[CUSTOM5]
IIF( ricetta.CUSTOM3 = '1', sImporto := ricetta.CUSTOM11, sImporto := 0 )
return sImporto
[D_CUSTOM5]
Descrizioneinvisibile_iva
[CUSTOM6]
sImporto := ricetta.CUSTOM5
sImporto = strTran( sImporto, ",", "." )
IVA := val(sImporto) * 0.220
s := trim(str(IVA,10,2))
return s
[D_CUSTOM6]
Descrizioneiva
[CUSTOM7]
sImporto := ricetta.CUSTOM4
sImporto = strTran( sImporto, ",", "." )
IVA := val(sImporto) * 0.200
s := trim(str(IVA,10,2))
return s
[D_CUSTOM7]
Descrizioneritenuta_acconto
[CUSTOM8]
bollo := PBgetText( "Immettere l'importo del bollo di  2.00 (solo per importi esenti IVA superiori a 77.47 )", 10, "", "Importo bollo" ) 
bollo := val (bollo)
s := trim(str(bollo,10,2))
return s
[D_CUSTOM8]
Descrizionebollo
[CUSTOM9]
sImporto := ricetta.CUSTOM11
sImporto := strTran( sImporto, ",", "." )
iva := ricetta.CUSTOM6
iva := strTran( iva, ",", "." )
acconto := ricetta.CUSTOM7
acconto := strTran( acconto, ",", "." )
bollo := ricetta.CUSTOM8
bollo := strTran( bollo, ",", "." )
totale := val(sImporto) + val(iva) - val(acconto) + val (bollo)
s := trim(str(totale,10,2))
return s
[D_CUSTOM9]
Descrizionetotale
[Opzioni]